﻿Public Class Tipo_SeleccionFalloAlta
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante el alta del Tipo de Seleccion")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_SeleccionFalloAlta
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante el alta del Tipo_Seleccion"
    End Sub
End Class

Public Class Tipo_SeleccionFalloEditar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la actualización del Tipo_Seleccion")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_SeleccionFalloEditar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la actualización del Tipo_Seleccion"
    End Sub
End Class

Public Class Tipo_SeleccionFalloBaja
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la baja del Tipo_Seleccion")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_SeleccionFalloEliminar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la baja del Tipo_Seleccion"
    End Sub
End Class

Public Class Tipo_SeleccionFalloBuscar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la búsqueda del Tipo_Seleccion")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_SeleccionFalloBuscar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la búsqueda del Tipo_Seleccion"
    End Sub
End Class

Public Class Tipo_SeleccionFalloConsultar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la consulta de Tipo_Seleccions")
        Me.codigo = Utils.Enumeradores.Excepeciones.Tipo_SeleccionFalloConsultar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la consulta de Tipo_Seleccions"
    End Sub
End Class
